home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #9 / Amiga Plus CD - 2004 - No. 09.iso / amigaplus / tools / dev_libs / feelin040718 / demos / signalhandler.c < prev    next >
C/C++ Source or Header  |  2004-08-03  |  7KB  |  246 lines
  1. #include <libraries/feelin.h>
  2.  
  3. #include <proto/exec.h>
  4. #include <proto/utility.h>
  5. #include <proto/feelin.h>
  6.  
  7. #define UtilityBase                 FeelinBase -> Utility
  8.  
  9. /// Header
  10. struct LocalObjectData
  11. {
  12.    FAreaData                       *AreaData;
  13.    FSignalHandler                   shnode;
  14.    ULONG                            index;
  15. };
  16.  
  17. /* Methods and Attributes for the custom class */
  18.  
  19. #define FM_Trigger                              (FCCM_BASE + 0)
  20.  
  21. #define FA_Delay                                (FCCA_BASE + 0)
  22.  
  23. /* Some strings to display */
  24.  
  25. static const char *LifeOfBrian[] =
  26. {
  27.   "Cheer up, Brian. You know what they say.",
  28.   "Some things in life are bad,",
  29.   "They can really make you mad.",
  30.   "Other things just make you swear and curse.",
  31.   "When you're chewing on life's grissle,",
  32.   "Don't grumble, give a whistle.",
  33.   "And this'll help things turn out for the best,",
  34.   "And...",
  35.   "Always look on the bright side of life",
  36.   "Always look on the light side of life",
  37.   "If life seems jolly rotten,",
  38.   "There's something you've forgotten,",
  39.   "And that's to laugh, and smile, and dance, and sing.",
  40.   "When you're feeling in the dumps,",
  41.   "Don't be silly chumps,",
  42.   "Just purse your lips and whistle, that's the thing.",
  43.   "And...",
  44.   "Always look on the bright side of life, come on!",
  45.   "Always look on the right side of life",
  46.   "For life is quite absurd,",
  47.   "And death's the final word.",
  48.   "You must always face the curtain with a bow.",
  49.   "Forget about your sin,",
  50.   "Give the audience a grin.",
  51.   "Enjoy it, it's your last chance anyhow,",
  52.   "So...",
  53.   "Always look on the bright side of death",
  54.   "Just before you draw your terminal breath.",
  55.   "Life's a piece of shit,",
  56.   "When you look at it.",
  57.   "Life's a laugh, and death's a joke, it's true.",
  58.   "You'll see it's all a show,",
  59.   "Keep 'em laughing as you go,",
  60.   "Just remember that the last laugh is on you.",
  61.   "And...",
  62.   "Always look on the bright side of life !",
  63.   "...",
  64.   "*** THE END ***",
  65.   "",
  66.   NULL,
  67. };
  68.  
  69. //+
  70.  
  71. /***************************************************************************/
  72. /* Here is the beginning of our new class...                               */
  73. /***************************************************************************/
  74.  
  75. ///mNew
  76. F_METHOD(ULONG,mNew)
  77. {
  78.    struct LocalObjectData *LOD = F_LOD(Class,Obj);
  79.  
  80.    LOD -> AreaData = (FAreaData *) F_Get(Obj,FA_AreaData);
  81.  
  82.    LOD -> shnode.Object      = Obj;
  83.    LOD -> shnode.Method      = FM_Trigger;
  84.    LOD -> shnode.Flags       = FF_SignalHandler_Timer;
  85.    LOD -> shnode.fsh_Secs    = 0;
  86.    LOD -> shnode.fsh_Micros  = 500000;
  87.  
  88.    LOD -> index = 0;
  89.  
  90.    return F_SUPERDO();
  91. }
  92. //+
  93. ///mSet
  94. F_METHOD(ULONG,mSet)
  95. {
  96.    struct LocalObjectData *LOD  = F_LOD(Class,Obj);
  97.    struct TagItem         *Tags = Msg,
  98.                           *item;
  99.  
  100.    while  (item = NextTagItem(&Tags))
  101.    switch (item -> ti_Tag)
  102.    {
  103.       case FA_Delay:
  104.       {
  105.          if (FF_Area_CanDraw & _flags)
  106.          {
  107.             F_Do(_app,FM_Application_RemSignalHandler,&LOD -> shnode);
  108.             LOD -> shnode.fsh_Micros = item -> ti_Data;
  109.             F_Do(_app,FM_Application_AddSignalHandler,&LOD -> shnode);
  110.          }
  111.          else
  112.          {
  113.             LOD -> shnode.fsh_Micros = item -> ti_Data;
  114.          }
  115.       }
  116.       break;
  117.    }
  118.  
  119.    return F_SUPERDO();
  120. }
  121. //+
  122. ///mSetup
  123. F_METHOD(ULONG,mSetup)
  124. {
  125.    struct LocalObjectData *LOD = F_LOD(Class,Obj);
  126.  
  127.    if (F_SUPERDO())
  128.    {
  129.      F_Do(_app,FM_Application_AddSignalHandler,&LOD -> shnode);
  130.  
  131.      return TRUE;
  132.    }
  133.    return FALSE;
  134. }
  135. //+
  136. ///mCleanup
  137. F_METHOD(ULONG,mCleanup)
  138. {
  139.   struct LocalObjectData *LOD = F_LOD(Class,Obj);
  140.  
  141.   F_Do(_app,FM_Application_RemSignalHandler,&LOD -> shnode);
  142.  
  143.   return F_SUPERDO();
  144. }
  145. //+
  146. ///mTrigger
  147. F_METHOD(ULONG,mTrigger)
  148. {
  149.    struct LocalObjectData *LOD = F_LOD(Class,Obj);
  150.  
  151.    F_Set(Obj,FA_Text,(ULONG)(LifeOfBrian[LOD -> index]));
  152.  
  153.    if (!LifeOfBrian[++LOD->index])
  154.    {
  155.       LOD -> index = 0;
  156.    }
  157.  
  158.    return TRUE;
  159. }
  160. //+
  161.  
  162. static struct FeelinMethodEntry Handlers[] =
  163. {
  164.    mNew,       NULL, FM_New,
  165.    mSet,       NULL, FM_Set,
  166.    mSetup,     NULL, FM_Setup,
  167.    mCleanup,   NULL, FM_Cleanup,
  168.    mTrigger,   NULL, FM_Trigger,
  169.  
  170.    NULL
  171. };
  172.  
  173. /* Thats all there is about it. Now lets see how things are used... */
  174.  
  175. struct FeelinBase *FeelinBase;
  176.  
  177. void main(void)
  178. {
  179.    FObject app,win,spd,my;
  180.    struct FeelinClass *fcc;
  181.  
  182.    if (FeelinBase = (struct FeelinBase *) OpenLibrary("feelin.library",FV_VERSION))
  183.    {
  184.       if (fcc = F_CreateClass(FA_Class_Super,         FC_Text,
  185.                               FA_Class_LODSize,       sizeof (struct LocalObjectData),
  186.                               FA_Class_MethodsTable,  Handlers,
  187.                               TAG_DONE))
  188.       {
  189.          app = ApplicationObject,
  190.             FA_Application_Title,       "SignalHandler_1",
  191.             FA_Application_Version,     "$VER: SignalHandler_1 1.0 (2004.05.19)",
  192.             FA_Application_Copyright,   "©2004, Olivier LAVIALE <olaviale@numericable.fr>",
  193.             FA_Application_Author,      "Stefan Stuntz",
  194.             FA_Application_Description, "Demonstrate the use of custom classes.",
  195.             FA_Application_Base,        "SH_1",
  196.  
  197.             Child, win = WindowObject,
  198.                FA_ID,            MAKE_ID('S','H','_','1'),
  199.                FA_Window_Title,  "SignalHandler Class",
  200.                FA_Window_Open,   TRUE,
  201.                
  202.                Child, VGroup,
  203.                   Child, TextObject,
  204.                      TextFrame,
  205.                      FA_Back,          "FP_Text_Back",
  206.                      FA_Text,          "<align=center>Demonstration of a class that reacts on<br>events (here: timer signals) automatically.",
  207.                      FA_SetMax,        FV_SetMaxH,
  208.                   End,
  209.  
  210.                   Child, my = F_NewObj(fcc -> Name,
  211.                      TextFrame,
  212.                      FA_Text_PreParse, "<align=center>",
  213.                      FA_Text_VCenter,  TRUE,
  214.                   End,
  215.  
  216.                   Child, ColGroup(2),
  217.                      Child, TextObject,
  218.                         FA_Text,       "Micros :",
  219.                         FA_SetMax,     TRUE,
  220.                         DontChain,
  221.                         End,
  222.                      Child, spd = SliderA, TRUE,5000,1000000,50000,
  223.                        "FA_Numeric_Step", 1000,
  224.                         FA_ID,          MAKE_ID('S','P','E','D'),
  225.                         FA_ContextHelp, "Adjust the number of micro seconds\nto wait between each string.",
  226.                         End,
  227.                   End,
  228.                End,
  229.             End,
  230.          End;
  231.  
  232.          if (app)
  233.          {
  234.             F_Do(win,FM_Notify,FA_Window_CloseRequest,TRUE,app,FM_Application_Shutdown,0);
  235.             F_Do(spd,FM_Notify,"FA_Numeric_Value",FV_Notify_Always,my,FM_Set,2,FA_Delay,FV_Notify_Value);
  236.  
  237.             F_Do(app,FM_Application_Run);
  238.             F_DisposeObj(app);
  239.          }
  240.  
  241.          F_DeleteClass(fcc);
  242.       }
  243.       CloseLibrary(FeelinBase);
  244.    }
  245. }
  246.